/*!	 valuenodedynamiclistinsert.cpp
**	 Template File
**
**	Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
**  Copyright (c) 2008 Chris Moore
**
**	This package is free software; you can redistribute it and/or
**	modify it under the terms of the GNU General Public License as
**	published by the Free Software Foundation; either version 2 of
**	the License, or (at your option) any later version.
**
**	This package is distributed in the hope that it will be useful,
**	but WITHOUT ANY WARRANTY; without even the implied warranty of
**	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
**	General Public License for more details.
**
*/

#ifdef USING_PCH
#	include "pch.h"
#else
#ifdef HAVE_CONFIG_H
#	include <config.h>
#endif

#include <synfig/general.h>
#include <synfig/valuenodes/valuenode_composite.h>

#include "valuenodedynamiclistinsert.h"
#include <synfigapp/canvasinterface.h>

#include <synfigapp/localization.h>

#endif

using namespace std;
using namespace etl;
using namespace synfig;
using namespace synfigapp;
using namespace Action;

ACTION_INIT(Action::ValueNodeDynamicListInsert);
ACTION_SET_NAME(Action::ValueNodeDynamicListInsert, "ValueNodeDynamicListInsert");
ACTION_SET_LOCAL_NAME(Action::ValueNodeDynamicListInsert, N_("Insert Item"));
ACTION_SET_TASK(Action::ValueNodeDynamicListInsert, "insert");
ACTION_SET_CATEGORY(Action::ValueNodeDynamicListInsert, Action::CATEGORY_VALUEDESC | Action::CATEGORY_VALUENODE | Action::CATEGORY_HIDDEN);
ACTION_SET_PRIORITY(Action::ValueNodeDynamicListInsert, -20);
ACTION_SET_VERSION(Action::ValueNodeDynamicListInsert, "0.0");
ACTION_SET_CVS_ID(Action::ValueNodeDynamicListInsert, "$Id$");

Action::ValueNodeDynamicListInsert::ValueNodeDynamicListInsert()
{
    index = 0;
    time = 0;
    origin = 0.5f;
    set_dirty(true);
    force_link_radius = false;
}

Action::ParamVocab
Action::ValueNodeDynamicListInsert::get_param_vocab()
{
    ParamVocab ret(Action::CanvasSpecific::get_param_vocab());

    ret.push_back(ParamDesc("value_desc", Param::TYPE_VALUEDESC)
                  .set_local_name(_("ValueDesc"))
                 );
    ret.push_back(ParamDesc("time", Param::TYPE_TIME)
                  .set_local_name(_("Time"))
                  .set_optional()
                 );
    ret.push_back(ParamDesc("origin", Param::TYPE_REAL)
                  .set_local_name(_("Origin"))
                  .set_optional()
                 );
    ret.push_back(ParamDesc("item", Param::TYPE_VALUENODE)
                  .set_local_name(_("ValueNode to insert"))
                  .set_optional()
                 );
    ret.push_back(ParamDesc("force_link_radius", Param::TYPE_BOOL)
                  .set_local_name(_("Force link radius"))
                  .set_optional()
                 );

    return ret;
}

bool
Action::ValueNodeDynamicListInsert::is_candidate(const ParamList &x)
{
    if (!candidate_check(get_param_vocab(), x)) {
        return false;
    }

    ValueDesc value_desc(x.find("value_desc")->second.get_value_desc());

    return ((value_desc.parent_is_value_node() &&
             // We need a Dynamic List parent.
             ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_parent_value_node()))
            ||
            // Or a Dynamic List value node
            (value_desc.is_value_node() &&
             ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_value_node())));
}

bool
Action::ValueNodeDynamicListInsert::set_param(const synfig::String& name, const Action::Param &param)
{
    if (name == "value_desc" && param.get_type() == Param::TYPE_VALUEDESC) {
        ValueDesc value_desc(param.get_value_desc());

        if (!value_desc.parent_is_value_node()) {
            if (value_desc.is_value_node()) {
                value_node = ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_value_node());
                index = 0;
            } else {
                return false;
            }
        } else {
            value_node = ValueNode_DynamicList::Handle::cast_dynamic(value_desc.get_parent_value_node());
            index = value_desc.get_index();
        }

        if (!value_node) { // Not a Dynamic list
            return false;
        }

        return true;

    }

    if (name == "time" && param.get_type() == Param::TYPE_TIME) {
        time = param.get_time();

        return true;
    }

    if (name == "item" && param.get_type() == Param::TYPE_VALUENODE) {
        item = param.get_value_node();

        if (item) {
            list_entry.value_node = item;
        }

        return true;
    }

    if (name == "origin" && param.get_type() == Param::TYPE_REAL) {
        origin = param.get_real();

        return true;
    }

    if (name == "force_link_radius" && param.get_type() == Param::TYPE_BOOL) {
        force_link_radius = param.get_bool();

        return true;
    }

    return Action::CanvasSpecific::set_param(name, param);
}

bool
Action::ValueNodeDynamicListInsert::is_ready()const
{
    if (!value_node) {
        return false;
    }

    return Action::CanvasSpecific::is_ready();
}

void
Action::ValueNodeDynamicListInsert::perform()
{
    if (index > value_node->link_count()) {
        index = value_node->link_count();
    }

    list_entry = value_node->create_list_entry(index, time, origin);

    if (item) {
        list_entry.value_node = item;
    } else if (force_link_radius) {
        ValueNode_Composite::Handle composite = ValueNode_Composite::Handle::cast_dynamic(list_entry.value_node);

        if (composite && composite->get_type() == type_bline_point) {
            composite->set_link("split_radius", ValueNode_Const::create(false));
        }
    }

    assert(list_entry.value_node.rcount() == 1);

    value_node->add(list_entry, index);
    assert(list_entry.value_node.rcount() >= 2);

    // Signal that a layer has been inserted
    value_node->changed();

}

void
Action::ValueNodeDynamicListInsert::undo()
{
    assert(list_entry);
    assert(list_entry.value_node.rcount() >= 2);
    value_node->erase((value_node->list.begin() + index)->value_node);
    assert(list_entry.value_node.rcount() >= 1);

    // Signal that a layer has been inserted
    value_node->changed();

}